home *** CD-ROM | disk | FTP | other *** search
/ Gold Medal Software 2 / Gold Medal Software Volume 2 (Gold Medal) (1994).iso / os2 / cenvi2.arj / DISKFREE.CMD < prev    next >
OS/2 REXX Batch file  |  1993-05-21  |  658b  |  21 lines

  1. @echo OFF
  2. REM DiskFree.cmd - Display how much disk space is available on a drive, and set the
  3. REM                DISK_FREE environment variable to that amount
  4.  
  5. if "%1" == "" GOTO SHOW_HOW
  6. if not "%2"=="" GOTO SHOW_HOW
  7. dir %1:\ | find "bytes free" | CEnvi DISK_FREE = atol(gets()) / 1024; ESet("TempSet.cmd")
  8. call TempSet.cmd
  9. del TempSet.cmd
  10. ECHO DRIVE %1 HAS %DISK_FREE% K-BYTES FREE
  11. GOTO FINI
  12.  
  13. :SHOW_HOW
  14. ECHO DiskFree.cmd - Show how much disk space is available on a drive, in kilobytes,
  15. ECHO                and set DISK_FREE environment variable to that size
  16. ECHO USAGE: DiskFree DriveLetter
  17. ECHO Example: DiskFree C
  18. GOTO FINI
  19.  
  20. :FINI
  21.